home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 7 / BBS in a Box - Macintosh - Volume VII (BBS in a Box) (January 1993).iso / Files / Education / States / Kansas HTB 2.1 L1.cpt / Kansas HTB 2.1 L1 / stack_-1.xml < prev   
Extensible Markup Language  |  1992-09-12  |  2KB  |  29 lines
  1. <?xml version="1.0" encoding="utf-8" ?>
  2. <!DOCTYPE stack PUBLIC "-//Apple, Inc.//DTD stack V 2.0//EN" "" >
  3. <stack>
  4.     <name>in.1 L1</name>
  5.     <id>-1</id>
  6.     <cardCount>9</cardCount>
  7.     <cardID>5246</cardID>
  8.     <listID>7167</listID>
  9.     <cantModify><false /></cantModify>
  10.     <cantDelete><false /></cantDelete>
  11.     <cantAbort><false /></cantAbort>
  12.     <cardSize>
  13.         <width>512</width>
  14.         <height>342</height>
  15.     </cardSize>
  16.     <script>function choice txt, listreturn ListDialog(1, txt, list)end choicefunction choices txt, listreturn ListDialog("AnySelection", txt, list)end choicesfunction ListDialog logic, txt, listput return into CRput Dialoger("!Choice"&CR&"KeyScrollItem 3"¬¨, txt¬¨, "userList Chicago,12,"&logic  & CR & List¬¨) into dResultif first word of dResult is "Error:" thenanswer dResult with Cancelexit to HyperCardelseif line 2 of dResult is empty then -- Cancel not clickedget line 3 of dResult -- selected list linesput empty into selectedLinesrepeat with i = 1 to number of items in itput line (item i of it) of list & return after selectedLinesend repeatdelete last char of selectedlinesreturn selectedLinesend ifend ifend ListDialogon closestackdelete menu "keywords"end closestack</script>
  17.     <background id="2311" file="background_2311.xml" name="" />
  18.     <background id="5530" file="background_5530.xml" name="" />
  19.     <card id="5246" file="card_5246.xml" marked="false" name="" owner="5530" />
  20.     <card id="2195" file="card_2195.xml" marked="false" name="Help!" owner="2311" />
  21.     <card id="2668" file="card_2668.xml" marked="false" name="" owner="2311" />
  22.     <card id="2826" file="card_2826.xml" marked="false" name="" owner="2311" />
  23.     <card id="4460" file="card_4460.xml" marked="false" name="" owner="2311" />
  24.     <card id="6125" file="card_6125.xml" marked="false" name="" owner="2311" />
  25.     <card id="6290" file="card_6290.xml" marked="false" name="" owner="2311" />
  26.     <card id="6405" file="card_6405.xml" marked="false" name="" owner="2311" />
  27.     <card id="6665" file="card_6665.xml" marked="false" name="" owner="2311" />
  28. </stack>
  29.